Developer CD Series 1990 September: Essentials 4

home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1990 September: Essentials 4 / ADC Developer CD (1990-09) [Essentials 4]_iso / Developer Essentials 4.iso / d e v e l o p / develop 3 code / Surf's Up! / Interfaces / PInterfaces / TMIntf.p < prev
MacBinary | 1989-11-17 | 7.0 KB | [TEXT/MPS ]
open in:
MacOS 8.1 extracted |
Win98 extracted |
DOS extracted
browse contents |
view JSON data |
view as text

This file was processed as: MacBinary (archive/macBinary).
Confidence	Program	Detection	Match Type	Support
`66%`	dexvert	ZX81 Sinclair BASIC `(image/sinclairBASIC)`	ext	Supported
`10%`	dexvert	MacBinary `(archive/macBinary)`	fallback	Supported
`1%`	dexvert	Applause Picture `(image/applausePicture)`	ext	Unsupported
`1%`	dexvert	bsdiff patch `(other/bsdiffPatch)`	ext	Unsupported
`1%`	dexvert	imgdiff patch `(other/imgdiffPatch)`	ext	Unsupported
`1%`	dexvert	MATLAB p-code `(other/matlabPCode)`	ext	Unsupported
`1%`	dexvert	WSUS Patch Storage File `(other/wsusPatchStorageFile)`	ext	Unsupported
`1%`	dexvert	Text File `(text/txt)`	fallback	Supported
`100%`	file	MacBinary II, inited, Fri Nov 17 00:00:00 1989, modified Fri Nov 17 00:00:00 1989, creator 'MPS ', type ASCII, 6597 bytes "TMIntf.p" , at 0x1a45 347 bytes resource	default (weak)
`99%`	file	data	default
`74%`	TrID	Macintosh plain text (MacBinary)	default
`25%`	TrID	MacBinary 2	default (weak)
`100%`	siegfried	fmt/1762 MacBinary (II)	default
`100%`	lsar	MacBinary	default
id metadata
key	value
macFileType	`[TEXT]`
macFileCreator	`[MPS ]`
hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 08 54 4d 49 6e 74 66 | 2e 70 00 00 00 00 00 00 |..TMIntf|.p......|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 4d 50 53 | 20 01 00 00 40 01 00 00 |.TEXTMPS| ...@...|
|00000050| 00 00 00 00 00 19 c5 00 | 00 01 5b a1 89 40 d0 a1 |........|..[..@..|
|00000060| 89 40 d0 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |.@......|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 99 a0 00 00 |........|........|
|00000080| 7b 0d 09 54 4d 49 6e 74 | 66 2e 70 0d 09 50 61 73 |{..TMInt|f.p..Pas|
|00000090| 63 61 6c 20 49 6e 74 65 | 72 66 61 63 65 20 74 6f |cal Inte|rface to|
|000000a0| 20 74 68 65 20 54 65 72 | 6d 69 6e 61 6c 20 4d 61 | the Ter|minal Ma|
|000000b0| 6e 61 67 65 72 0d 09 0d | 09 43 6f 70 79 72 69 67 |nager...|.Copyrig|
|000000c0| 68 74 20 a9 20 41 70 70 | 6c 65 20 43 6f 6d 70 75 |ht . App|le Compu|
|000000d0| 74 65 72 2c 20 49 6e 63 | 2e 20 31 39 38 38 2c 31 |ter, Inc|. 1988,1|
|000000e0| 39 38 39 0d 09 41 6c 6c | 20 72 69 67 68 74 73 20 |989..All| rights |
|000000f0| 72 65 73 65 72 76 65 64 | 0d 7d 0d 7b 24 49 46 43 |reserved|.}.{$IFC|
|00000100| 20 55 4e 44 45 46 49 4e | 45 44 20 55 73 69 6e 67 | UNDEFIN|ED Using|
|00000110| 49 6e 63 6c 75 64 65 73 | 7d 0d 7b 24 53 45 54 43 |Includes|}.{$SETC|
|00000120| 20 55 73 69 6e 67 49 6e | 63 6c 75 64 65 73 20 3a | UsingIn|cludes :|
|00000130| 3d 20 30 7d 0d 7b 24 45 | 4e 44 43 7d 0d 0d 7b 24 |= 0}.{$E|NDC}..{$|
|00000140| 49 46 43 20 4e 4f 54 20 | 55 73 69 6e 67 49 6e 63 |IFC NOT |UsingInc|
|00000150| 6c 75 64 65 73 7d 0d 09 | 55 4e 49 54 20 54 4d 49 |ludes}..|UNIT TMI|
|00000160| 6e 74 66 3b 0d 20 20 20 | 20 49 4e 54 45 52 46 41 |ntf;.   | INTERFA|
|00000170| 43 45 0d 7b 24 45 4e 44 | 43 7d 0d 0d 7b 24 49 46 |CE.{$END|C}..{$IF|
|00000180| 43 20 55 4e 44 45 46 49 | 4e 45 44 20 55 73 69 6e |C UNDEFI|NED Usin|
|00000190| 67 54 4d 49 6e 74 66 7d | 0d 7b 24 53 45 54 43 20 |gTMIntf}|.{$SETC |
|000001a0| 55 73 69 6e 67 54 4d 49 | 6e 74 66 20 3a 3d 20 31 |UsingTMI|ntf := 1|
|000001b0| 7d 0d 0d 7b 24 49 2b 7d | 0d 7b 24 53 45 54 43 20 |}..{$I+}|.{$SETC |
|000001c0| 54 4d 49 6e 74 66 49 6e | 63 6c 75 64 65 73 20 3a |TMIntfIn|cludes :|
|000001d0| 3d 20 55 73 69 6e 67 49 | 6e 63 6c 75 64 65 73 7d |= UsingI|ncludes}|
|000001e0| 0d 7b 24 53 45 54 43 20 | 55 73 69 6e 67 49 6e 63 |.{$SETC |UsingInc|
|000001f0| 6c 75 64 65 73 20 3a 3d | 20 31 7d 0d 7b 24 49 46 |ludes :=| 1}.{$IF|
|00000200| 43 20 55 4e 44 45 46 49 | 4e 45 44 20 55 73 69 6e |C UNDEFI|NED Usin|
|00000210| 67 44 69 61 6c 6f 67 73 | 7d 0d 7b 24 49 20 44 69 |gDialogs|}.{$I Di|
|00000220| 61 6c 6f 67 73 2e 70 7d | 0d 7b 24 45 4e 44 43 7d |alogs.p}|.{$ENDC}|
|00000230| 0d 0d 7b 24 49 46 43 20 | 55 4e 44 45 46 49 4e 45 |..{$IFC |UNDEFINE|
|00000240| 44 20 55 73 69 6e 67 43 | 54 42 55 74 69 6c 73 7d |D UsingC|TBUtils}|
|00000250| 0d 7b 24 49 20 43 54 42 | 55 74 69 6c 73 2e 70 7d |.{$I CTB|Utils.p}|
|00000260| 0d 7b 24 45 4e 44 43 7d | 0d 0d 7b 24 49 46 43 20 |.{$ENDC}|..{$IFC |
|00000270| 55 4e 44 45 46 49 4e 45 | 44 20 55 73 69 6e 67 43 |UNDEFINE|D UsingC|
|00000280| 4d 49 6e 74 66 7d 0d 7b | 24 49 20 43 4d 49 6e 74 |MIntf}.{|$I CMInt|
|00000290| 66 2e 70 7d 0d 7b 24 45 | 4e 44 43 7d 0d 0d 7b 24 |f.p}.{$E|NDC}..{$|
|000002a0| 53 45 54 43 20 55 73 69 | 6e 67 49 6e 63 6c 75 64 |SETC Usi|ngInclud|
|000002b0| 65 73 20 3a 3d 20 54 4d | 49 6e 74 66 49 6e 63 6c |es := TM|IntfIncl|
|000002c0| 75 64 65 73 7d 0d 0d 43 | 4f 4e 53 54 0d 7b 20 63 |udes}..C|ONST.{ c|
|000002d0| 75 72 72 65 6e 74 20 54 | 65 72 6d 69 6e 61 6c 20 |urrent T|erminal |
|000002e0| 4d 61 6e 61 67 65 72 20 | 76 65 72 73 69 6f 6e 20 |Manager |version |
|000002f0| 7d 0d 09 63 75 72 54 4d | 56 65 72 73 69 6f 6e 09 |}..curTM|Version.|
|00000300| 09 09 3d 09 31 3b 0d 09 | 0d 7b 20 63 75 72 72 65 |..=.1;..|.{ curre|
|00000310| 6e 74 20 54 65 72 6d 69 | 6e 61 6c 20 4d 61 6e 61 |nt Termi|nal Mana|
|00000320| 67 65 72 20 45 6e 76 69 | 72 6f 6e 6d 65 6e 74 20 |ger Envi|ronment |
|00000330| 52 65 63 6f 72 64 20 76 | 65 72 73 69 6f 6e 20 7d |Record v|ersion }|
|00000340| 0d 09 63 75 72 54 65 72 | 6d 45 6e 76 52 65 63 56 |..curTer|mEnvRecV|
|00000350| 65 72 73 09 09 3d 09 30 | 3b 0d 09 0d 7b 20 54 4d |ers..=.0|;...{ TM|
|00000360| 45 72 72 20 7d 0d 09 74 | 6d 47 65 6e 65 72 69 63 |Err }..t|mGeneric|
|00000370| 45 72 72 6f 72 09 09 09 | 3d 09 2d 31 3b 0d 09 74 |Error...|=.-1;..t|
|00000380| 6d 4e 6f 45 72 72 09 09 | 09 09 09 3d 09 30 3b 0d |mNoErr..|...=.0;.|
|00000390| 09 74 6d 4e 6f 74 53 75 | 70 70 6f 72 74 65 64 09 |.tmNotSu|pported.|
|000003a0| 09 09 3d 09 37 3b 0d 09 | 74 6d 4e 6f 54 6f 6f 6c |..=.7;..|tmNoTool|
|000003b0| 73 09 09 09 09 3d 09 38 | 3b 0d 09 0d 7b 20 54 4d |s....=.8|;...{ TM|
|000003c0| 46 6c 61 67 73 20 7d 0d | 09 74 6d 49 6e 76 69 73 |Flags }.|.tmInvis|
|000003d0| 69 62 6c 65 09 09 09 09 | 3d 09 24 30 30 30 30 30 |ible....|=.$00000|
|000003e0| 30 30 31 3b 0d 09 74 6d | 53 61 76 65 42 65 66 6f |001;..tm|SaveBefo|
|000003f0| 72 65 43 6c 65 61 72 09 | 09 3d 09 24 30 30 30 30 |reClear.|.=.$0000|
|00000400| 30 30 30 32 3b 0d 09 74 | 6d 4e 6f 4d 65 6e 75 73 |0002;..t|mNoMenus|
|00000410| 09 09 09 09 3d 09 24 30 | 30 30 30 30 30 30 34 3b |....=.$0|0000004;|
|00000420| 0d 09 74 6d 41 75 74 6f | 53 63 72 6f 6c 6c 09 09 |..tmAuto|Scroll..|
|00000430| 09 3d 09 24 30 30 30 30 | 30 30 30 38 3b 0d 0d 7b |.=.$0000|0008;..{|
|00000440| 20 54 4d 53 65 6c 54 79 | 70 65 73 20 26 20 54 4d | TMSelTy|pes & TM|
|00000450| 53 65 61 72 63 68 54 79 | 70 65 73 20 7d 0d 09 73 |SearchTy|pes }..s|
|00000460| 65 6c 54 65 78 74 4e 6f | 72 6d 61 6c 09 09 09 3d |elTextNo|rmal...=|
|00000470| 09 24 30 30 30 31 3b 0d | 09 73 65 6c 54 65 78 74 |.$0001;.|.selText|
|00000480| 42 6f 78 65 64 09 09 09 | 3d 09 24 30 30 30 32 3b |Boxed...|=.$0002;|
|00000490| 0d 09 73 65 6c 47 72 61 | 70 68 69 63 73 4d 61 72 |..selGra|phicsMar|
|000004a0| 71 75 65 65 09 09 3d 09 | 24 30 30 30 34 3b 0d 09 |quee..=.|$0004;..|
|000004b0| 73 65 6c 47 72 61 70 68 | 69 63 73 4c 61 73 73 6f |selGraph|icsLasso|
|000004c0| 09 09 3d 09 24 30 30 30 | 38 3b 0d 09 09 0d 09 74 |..=.$000|8;.....t|
|000004d0| 6d 53 65 61 72 63 68 4e | 6f 44 69 61 63 72 69 74 |mSearchN|oDiacrit|
|000004e0| 09 09 3d 09 24 30 31 30 | 30 3b 09 7b 54 68 65 73 |..=.$010|0;.{Thes|
|000004f0| 65 20 61 72 65 20 6f 6e | 6c 79 20 66 6f 72 20 54 |e are on|ly for T|
|00000500| 4d 53 65 61 72 63 68 54 | 79 70 65 73 7d 0d 09 74 |MSearchT|ypes}..t|
|00000510| 6d 53 65 61 72 63 68 4e | 6f 43 61 73 65 09 09 09 |mSearchN|oCase...|
|00000520| 3d 09 24 30 32 30 30 3b | 0d 09 0d 7b 20 54 4d 43 |=.$0200;|...{ TMC|
|00000530| 75 72 73 6f 72 54 79 70 | 65 73 20 7d 0d 09 63 75 |ursorTyp|es }..cu|
|00000540| 72 73 6f 72 54 65 78 74 | 09 09 09 09 3d 09 31 3b |rsorText|....=.1;|
|00000550| 0d 09 63 75 72 73 6f 72 | 47 72 61 70 68 69 63 73 |..cursor|Graphics|
|00000560| 09 09 09 3d 09 32 3b 0d | 09 0d 7b 20 54 4d 54 65 |...=.2;.|..{ TMTe|
|00000570| 72 6d 54 79 70 65 73 20 | 7d 0d 09 74 6d 54 65 78 |rmTypes |}..tmTex|
|00000580| 74 54 65 72 6d 69 6e 61 | 6c 09 09 09 3d 09 24 30 |tTermina|l...=.$0|
|00000590| 30 30 31 3b 0d 09 74 6d | 47 72 61 70 68 69 63 73 |001;..tm|Graphics|
|000005a0| 54 65 72 6d 69 6e 61 6c | 09 09 3d 09 24 30 30 30 |Terminal|..=.$000|
|000005b0| 32 3b 0d 09 0d 54 59 50 | 45 0d 09 54 4d 45 72 72 |2;...TYP|E..TMErr|
|000005c0| 09 09 09 09 3d 09 4f 53 | 45 72 72 3b 0d 09 54 4d |....=.OS|Err;..TM|
|000005d0| 46 6c 61 67 73 09 09 09 | 09 3d 09 4c 4f 4e 47 49 |Flags...|.=.LONGI|
|000005e0| 4e 54 3b 0d 09 54 4d 53 | 65 6c 54 79 70 65 73 09 |NT;..TMS|elTypes.|
|000005f0| 09 09 3d 09 49 4e 54 45 | 47 45 52 3b 0d 09 54 4d |..=.INTE|GER;..TM|
|00000600| 53 65 61 72 63 68 54 79 | 70 65 73 09 09 3d 09 49 |SearchTy|pes..=.I|
|00000610| 4e 54 45 47 45 52 3b 0d | 09 54 4d 43 75 72 73 6f |NTEGER;.|.TMCurso|
|00000620| 72 54 79 70 65 73 09 09 | 3d 09 49 4e 54 45 47 45 |rTypes..|=.INTEGE|
|00000630| 52 3b 0d 09 54 4d 54 65 | 72 6d 54 79 70 65 73 09 |R;..TMTe|rmTypes.|
|00000640| 09 09 3d 09 49 4e 54 45 | 47 45 52 3b 0d 09 09 0d |..=.INTE|GER;....|
|00000650| 09 54 65 72 6d 44 61 74 | 61 42 6c 6f 63 6b 48 09 |.TermDat|aBlockH.|
|00000660| 09 3d 20 5e 54 65 72 6d | 44 61 74 61 42 6c 6f 63 |.= ^Term|DataBloc|
|00000670| 6b 50 74 72 3b 0d 09 54 | 65 72 6d 44 61 74 61 42 |kPtr;..T|ermDataB|
|00000680| 6c 6f 63 6b 50 74 72 09 | 3d 20 5e 54 65 72 6d 44 |lockPtr.|= ^TermD|
|00000690| 61 74 61 42 6c 6f 63 6b | 3b 0d 09 54 65 72 6d 44 |ataBlock|;..TermD|
|000006a0| 61 74 61 42 6c 6f 63 6b | 09 09 3d 09 52 45 43 4f |ataBlock|..=.RECO|
|000006b0| 52 44 0d 09 09 66 6c 61 | 67 73 09 09 09 3a 20 09 |RD...fla|gs...: .|
|000006c0| 54 4d 54 65 72 6d 54 79 | 70 65 73 3b 0d 09 09 74 |TMTermTy|pes;...t|
|000006d0| 68 65 44 61 74 61 09 09 | 09 3a 20 09 48 61 6e 64 |heData..|.: .Hand|
|000006e0| 6c 65 3b 0d 09 09 61 75 | 78 44 61 74 61 09 09 09 |le;...au|xData...|
|000006f0| 3a 20 09 48 61 6e 64 6c | 65 3b 0d 09 09 72 65 73 |: .Handl|e;...res|
|00000700| 65 72 76 65 64 09 09 3a | 20 09 4c 4f 4e 47 49 4e |erved..:| .LONGIN|
|00000710| 54 3b 0d 09 45 4e 44 3b | 0d 09 0d 09 54 65 72 6d |T;..END;|....Term|
|00000720| 45 6e 76 69 72 6f 6e 50 | 74 72 09 09 3d 09 5e 54 |EnvironP|tr..=.^T|
|00000730| 65 72 6d 45 6e 76 69 72 | 6f 6e 52 65 63 3b 0d 09 |ermEnvir|onRec;..|
|00000740| 54 65 72 6d 45 6e 76 69 | 72 6f 6e 52 65 63 09 09 |TermEnvi|ronRec..|
|00000750| 3d 09 52 45 43 4f 52 44 | 0d 09 09 76 65 72 73 69 |=.RECORD|...versi|
|00000760| 6f 6e 09 09 09 3a 09 49 | 4e 54 45 47 45 52 3b 0d |on...:.I|NTEGER;.|
|00000770| 09 09 74 65 72 6d 54 79 | 70 65 09 09 3a 09 54 4d |..termTy|pe..:.TM|
|00000780| 54 65 72 6d 54 79 70 65 | 73 3b 0d 09 09 74 65 78 |TermType|s;...tex|
|00000790| 74 52 6f 77 73 09 09 3a | 09 49 4e 54 45 47 45 52 |tRows..:|.INTEGER|
|000007a0| 3b 0d 09 09 74 65 78 74 | 43 6f 6c 73 09 09 3a 09 |;...text|Cols..:.|
|000007b0| 49 4e 54 45 47 45 52 3b | 0d 09 09 63 65 6c 6c 53 |INTEGER;|...cellS|
|000007c0| 69 7a 65 09 09 3a 09 50 | 6f 69 6e 74 3b 0d 09 09 |ize..:.P|oint;...|
|000007d0| 67 72 61 70 68 69 63 53 | 69 7a 65 09 09 3a 09 52 |graphicS|ize..:.R|
|000007e0| 65 63 74 3b 0d 09 09 73 | 6c 6f 70 09 09 09 3a 09 |ect;...s|lop...:.|
|000007f0| 50 6f 69 6e 74 3b 0d 09 | 09 61 75 78 53 70 61 63 |Point;..|.auxSpac|
|00000800| 65 09 09 3a 09 52 65 63 | 74 3b 0d 09 45 4e 44 3b |e..:.Rec|t;..END;|
|00000810| 09 0d 09 09 0d 09 0d 09 | 54 4d 53 65 6c 65 63 74 |........|TMSelect|
|00000820| 69 6f 6e 09 09 09 3d 09 | 52 45 43 4f 52 44 0d 09 |ion...=.|RECORD..|
|00000830| 09 43 41 53 45 20 49 4e | 54 45 47 45 52 20 4f 46 |.CASE IN|TEGER OF|
|00000840| 0d 09 09 09 31 3a 09 28 | 0d 09 09 09 09 73 65 6c |....1:.(|.....sel|
|00000850| 52 65 63 74 09 09 09 3a | 09 52 65 63 74 3b 0d 09 |Rect...:|.Rect;..|
|00000860| 09 09 09 29 3b 0d 09 09 | 09 32 3a 09 28 0d 09 09 |...);...|.2:.(...|
|00000870| 09 09 73 65 6c 52 67 6e | 48 61 6e 64 6c 65 09 3a |..selRgn|Handle.:|
|00000880| 09 52 67 6e 48 61 6e 64 | 6c 65 3b 0d 09 09 09 09 |.RgnHand|le;.....|
|00000890| 66 69 6c 6c 65 72 09 09 | 09 3a 09 4c 4f 4e 47 49 |filler..|.:.LONGI|
|000008a0| 4e 54 3b 0d 09 09 09 09 | 29 3b 0d 09 09 09 45 4e |NT;.....|);....EN|
|000008b0| 44 3b 0d 0d 09 54 65 72 | 6d 48 61 6e 64 6c 65 09 |D;...Ter|mHandle.|
|000008c0| 09 09 3d 09 5e 54 65 72 | 6d 50 6f 69 6e 74 65 72 |..=.^Ter|mPointer|
|000008d0| 3b 0d 09 54 65 72 6d 50 | 6f 69 6e 74 65 72 09 09 |;..TermP|ointer..|
|000008e0| 09 3d 09 5e 54 65 72 6d | 52 65 63 6f 72 64 3b 0d |.=.^Term|Record;.|
|000008f0| 09 54 65 72 6d 52 65 63 | 6f 72 64 09 09 09 3d 09 |.TermRec|ord...=.|
|00000900| 52 45 43 4f 52 44 0d 09 | 09 70 72 6f 63 49 44 09 |RECORD..|.procID.|
|00000910| 09 09 3a 09 49 4e 54 45 | 47 45 52 3b 0d 09 09 09 |..:.INTE|GER;....|
|00000920| 09 0d 09 09 66 6c 61 67 | 73 09 09 09 3a 09 54 4d |....flag|s...:.TM|
|00000930| 46 6c 61 67 73 3b 0d 09 | 09 65 72 72 43 6f 64 65 |Flags;..|.errCode|
|00000940| 09 09 09 3a 09 54 4d 45 | 72 72 3b 0d 09 09 0d 09 |...:.TME|rr;.....|
|00000950| 09 72 65 66 43 6f 6e 09 | 09 09 3a 09 4c 4f 4e 47 |.refCon.|..:.LONG|
|00000960| 49 4e 54 3b 0d 09 09 75 | 73 65 72 44 61 74 61 09 |INT;...u|serData.|
|00000970| 09 3a 09 4c 4f 4e 47 49 | 4e 54 3b 0d 0d 09 09 64 |.:.LONGI|NT;....d|
|00000980| 65 66 50 72 6f 63 09 09 | 09 3a 09 50 72 6f 63 50 |efProc..|.:.ProcP|
|00000990| 74 72 3b 0d 0d 09 09 63 | 6f 6e 66 69 67 09 09 09 |tr;....c|onfig...|
|000009a0| 3a 09 50 74 72 3b 0d 09 | 09 6f 6c 64 43 6f 6e 66 |:.Ptr;..|.oldConf|
|000009b0| 69 67 09 09 3a 09 50 74 | 72 3b 0d 0d 09 09 65 6e |ig..:.Pt|r;....en|
|000009c0| 76 69 72 6f 6e 73 50 72 | 6f 63 09 3a 09 50 72 6f |vironsPr|oc.:.Pro|
|000009d0| 63 50 74 72 3b 0d 09 09 | 72 65 73 65 72 76 65 64 |cPtr;...|reserved|
|000009e0| 31 09 09 3a 09 4c 4f 4e | 47 49 4e 54 3b 0d 09 09 |1..:.LON|GINT;...|
|000009f0| 72 65 73 65 72 76 65 64 | 32 09 09 3a 09 4c 4f 4e |reserved|2..:.LON|
|00000a00| 47 49 4e 54 3b 0d 0d 09 | 09 74 6d 50 72 69 76 61 |GINT;...|.tmPriva|
|00000a10| 74 65 09 09 3a 09 50 74 | 72 3b 0d 09 0d 09 09 73 |te..:.Pt|r;.....s|
|00000a20| 65 6e 64 50 72 6f 63 09 | 09 3a 09 50 72 6f 63 50 |endProc.|.:.ProcP|
|00000a30| 74 72 3b 0d 09 09 62 72 | 65 61 6b 50 72 6f 63 09 |tr;...br|eakProc.|
|00000a40| 09 3a 09 50 72 6f 63 50 | 74 72 3b 0d 09 09 63 61 |.:.ProcP|tr;...ca|
|00000a50| 63 68 65 50 72 6f 63 09 | 09 3a 09 50 72 6f 63 50 |cheProc.|.:.ProcP|
|00000a60| 74 72 3b 0d 09 09 63 6c | 69 6b 4c 6f 6f 70 09 09 |tr;...cl|ikLoop..|
|00000a70| 3a 09 50 72 6f 63 50 74 | 72 3b 0d 09 09 09 0d 09 |:.ProcPt|r;......|
|00000a80| 09 6f 77 6e 65 72 09 09 | 09 3a 09 57 69 6e 64 6f |.owner..|.:.Windo|
|00000a90| 77 50 74 72 3b 0d 09 09 | 74 65 72 6d 52 65 63 74 |wPtr;...|termRect|
|00000aa0| 09 09 3a 09 52 65 63 74 | 3b 0d 09 09 76 69 65 77 |..:.Rect|;...view|
|00000ab0| 52 65 63 74 09 09 3a 09 | 52 65 63 74 3b 0d 09 09 |Rect..:.|Rect;...|
|00000ac0| 76 69 73 52 65 63 74 09 | 09 09 3a 09 52 65 63 74 |visRect.|..:.Rect|
|00000ad0| 3b 0d 09 09 0d 09 09 6c | 61 73 74 49 64 6c 65 09 |;......l|astIdle.|
|00000ae0| 09 3a 09 4c 4f 4e 47 49 | 4e 54 3b 0d 09 09 0d 09 |.:.LONGI|NT;.....|
|00000af0| 09 73 65 6c 65 63 74 69 | 6f 6e 09 09 3a 09 54 4d |.selecti|on..:.TM|
|00000b00| 53 65 6c 65 63 74 69 6f | 6e 3b 0d 09 09 73 65 6c |Selectio|n;...sel|
|00000b10| 54 79 70 65 09 09 09 3a | 09 54 4d 53 65 6c 54 79 |Type...:|.TMSelTy|
|00000b20| 70 65 73 3b 0d 09 09 0d | 09 09 6d 6c 75 46 69 65 |pes;....|..mluFie|
|00000b30| 6c 64 09 09 3a 09 4c 4f | 4e 47 49 4e 54 3b 0d 09 |ld..:.LO|NGINT;..|
|00000b40| 45 4e 44 3b 0d 0d 46 55 | 4e 43 54 49 4f 4e 20 09 |END;..FU|NCTION .|
|00000b50| 49 6e 69 74 54 4d 3a 20 | 54 4d 45 72 72 3b 0d 46 |InitTM: |TMErr;.F|
|00000b60| 55 4e 43 54 49 4f 4e 20 | 09 54 4d 47 65 74 56 65 |UNCTION |.TMGetVe|
|00000b70| 72 73 69 6f 6e 28 68 54 | 65 72 6d 3a 20 54 65 72 |rsion(hT|erm: Ter|
|00000b80| 6d 48 61 6e 64 6c 65 29 | 3a 20 48 61 6e 64 6c 65 |mHandle)|: Handle|
|00000b90| 3b 0d 46 55 4e 43 54 49 | 4f 4e 20 09 54 4d 47 65 |;.FUNCTI|ON .TMGe|
|00000ba0| 74 54 4d 56 65 72 73 69 | 6f 6e 3a 20 49 4e 54 45 |tTMVersi|on: INTE|
|00000bb0| 47 45 52 3b 0d 0d 46 55 | 4e 43 54 49 4f 4e 20 20 |GER;..FU|NCTION  |
|00000bc0| 09 54 4d 4e 65 77 28 74 | 65 72 6d 52 65 63 74 3a |.TMNew(t|ermRect:|
|00000bd0| 20 52 65 63 74 3b 20 76 | 69 65 77 52 65 63 74 3a | Rect; v|iewRect:|
|00000be0| 20 52 65 63 74 3b 20 66 | 6c 61 67 73 3a 20 54 4d | Rect; f|lags: TM|
|00000bf0| 46 6c 61 67 73 3b 0d 09 | 09 09 09 70 72 6f 63 49 |Flags;..|...procI|
|00000c00| 44 3a 20 49 4e 54 45 47 | 45 52 3b 20 6f 77 6e 65 |D: INTEG|ER; owne|
|00000c10| 72 3a 20 57 69 6e 64 6f | 77 50 74 72 3b 20 73 65 |r: Windo|wPtr; se|
|00000c20| 6e 64 50 72 6f 63 3a 20 | 50 72 6f 63 50 74 72 3b |ndProc: |ProcPtr;|
|00000c30| 20 63 61 63 68 65 50 72 | 6f 63 3a 20 50 72 6f 63 | cachePr|oc: Proc|
|00000c40| 50 74 72 3b 0d 09 09 09 | 09 62 72 65 61 6b 50 72 |Ptr;....|.breakPr|
|00000c50| 6f 63 3a 20 50 72 6f 63 | 50 74 72 3b 20 63 6c 69 |oc: Proc|Ptr; cli|
|00000c60| 6b 4c 6f 6f 70 3a 20 50 | 72 6f 63 50 74 72 3b 20 |kLoop: P|rocPtr; |
|00000c70| 65 6e 76 69 72 6f 6e 73 | 50 72 6f 63 3a 20 50 72 |environs|Proc: Pr|
|00000c80| 6f 63 50 74 72 3b 0d 09 | 09 09 09 72 65 66 43 6f |ocPtr;..|...refCo|
|00000c90| 6e 3a 20 4c 4f 4e 47 49 | 4e 54 3b 20 75 73 65 72 |n: LONGI|NT; user|
|00000ca0| 44 61 74 61 3a 20 4c 4f | 4e 47 49 4e 54 29 3a 20 |Data: LO|NGINT): |
|00000cb0| 54 65 72 6d 48 61 6e 64 | 6c 65 3b 0d 09 09 09 09 |TermHand|le;.....|
|00000cc0| 0d 50 52 4f 43 45 44 55 | 52 45 20 09 54 4d 44 69 |.PROCEDU|RE .TMDi|
|00000cd0| 73 70 6f 73 65 28 68 54 | 65 72 6d 3a 20 54 65 72 |spose(hT|erm: Ter|
|00000ce0| 6d 48 61 6e 64 6c 65 29 | 3b 0d 0d 50 52 4f 43 45 |mHandle)|;..PROCE|
|00000cf0| 44 55 52 45 20 09 54 4d | 4b 65 79 28 68 54 65 72 |DURE .TM|Key(hTer|
|00000d00| 6d 3a 20 54 65 72 6d 48 | 61 6e 64 6c 65 3b 20 74 |m: TermH|andle; t|
|00000d10| 68 65 45 76 65 6e 74 3a | 20 45 76 65 6e 74 52 65 |heEvent:| EventRe|
|00000d20| 63 6f 72 64 29 3b 0d 50 | 52 4f 43 45 44 55 52 45 |cord);.P|ROCEDURE|
|00000d30| 20 09 54 4d 55 70 64 61 | 74 65 28 68 54 65 72 6d | .TMUpda|te(hTerm|
|00000d40| 3a 20 54 65 72 6d 48 61 | 6e 64 6c 65 3b 20 76 69 |: TermHa|ndle; vi|
|00000d50| 73 52 67 6e 3a 20 52 67 | 6e 48 61 6e 64 6c 65 29 |sRgn: Rg|nHandle)|
|00000d60| 3b 0d 50 52 4f 43 45 44 | 55 52 45 20 09 54 4d 50 |;.PROCED|URE .TMP|
|00000d70| 61 69 6e 74 28 68 54 65 | 72 6d 3a 20 54 65 72 6d |aint(hTe|rm: Term|
|00000d80| 48 61 6e 64 6c 65 3b 20 | 74 68 65 54 65 72 6d 44 |Handle; |theTermD|
|00000d90| 61 74 61 3a 20 54 65 72 | 6d 44 61 74 61 42 6c 6f |ata: Ter|mDataBlo|
|00000da0| 63 6b 3b 20 74 68 65 52 | 65 63 74 3a 20 52 65 63 |ck; theR|ect: Rec|
|00000db0| 74 29 3b 0d 50 52 4f 43 | 45 44 55 52 45 20 09 54 |t);.PROC|EDURE .T|
|00000dc0| 4d 41 63 74 69 76 61 74 | 65 28 68 54 65 72 6d 3a |MActivat|e(hTerm:|
|00000dd0| 20 54 65 72 6d 48 61 6e | 64 6c 65 3b 20 61 63 74 | TermHan|dle; act|
|00000de0| 69 76 61 74 65 3a 20 42 | 4f 4f 4c 45 41 4e 29 3b |ivate: B|OOLEAN);|
|00000df0| 0d 50 52 4f 43 45 44 55 | 52 45 20 09 54 4d 52 65 |.PROCEDU|RE .TMRe|
|00000e00| 73 75 6d 65 28 68 54 65 | 72 6d 3a 20 54 65 72 6d |sume(hTe|rm: Term|
|00000e10| 48 61 6e 64 6c 65 3b 20 | 72 65 73 75 6d 65 3a 20 |Handle; |resume: |
|00000e20| 42 4f 4f 4c 45 41 4e 29 | 3b 0d 50 52 4f 43 45 44 |BOOLEAN)|;.PROCED|
|00000e30| 55 52 45 20 09 54 4d 43 | 6c 69 63 6b 28 68 54 65 |URE .TMC|lick(hTe|
|00000e40| 72 6d 3a 20 54 65 72 6d | 48 61 6e 64 6c 65 3b 20 |rm: Term|Handle; |
|00000e50| 74 68 65 45 76 65 6e 74 | 20 3a 20 45 76 65 6e 74 |theEvent| : Event|
|00000e60| 52 65 63 6f 72 64 29 3b | 0d 50 52 4f 43 45 44 55 |Record);|.PROCEDU|
|00000e70| 52 45 20 09 54 4d 49 64 | 6c 65 28 68 54 65 72 6d |RE .TMId|le(hTerm|
|00000e80| 3a 54 65 72 6d 48 61 6e | 64 6c 65 29 3b 0d 0d 46 |:TermHan|dle);..F|
|00000e90| 55 4e 43 54 49 4f 4e 20 | 20 09 54 4d 53 74 72 65 |UNCTION | .TMStre|
|00000ea0| 61 6d 28 68 54 65 72 6d | 3a 20 54 65 72 6d 48 61 |am(hTerm|: TermHa|
|00000eb0| 6e 64 6c 65 3b 20 74 68 | 65 42 75 66 66 65 72 3a |ndle; th|eBuffer:|
|00000ec0| 20 50 74 72 3b 20 74 68 | 65 4c 65 6e 67 74 68 3a | Ptr; th|eLength:|
|00000ed0| 20 4c 4f 4e 47 49 4e 54 | 3b 20 66 6c 61 67 73 3a | LONGINT|; flags:|
|00000ee0| 20 43 4d 46 6c 61 67 73 | 29 3a 20 4c 4f 4e 47 49 | CMFlags|): LONGI|
|00000ef0| 4e 54 3b 0d 46 55 4e 43 | 54 49 4f 4e 20 20 09 54 |NT;.FUNC|TION  .T|
|00000f00| 4d 4d 65 6e 75 28 68 54 | 65 72 6d 3a 20 54 65 72 |MMenu(hT|erm: Ter|
|00000f10| 6d 48 61 6e 64 6c 65 3b | 20 6d 65 6e 75 49 44 3a |mHandle;| menuID:|
|00000f20| 20 49 4e 54 45 47 45 52 | 3b 20 69 74 65 6d 3a 20 | INTEGER|; item: |
|00000f30| 49 4e 54 45 47 45 52 29 | 3a 20 42 4f 4f 4c 45 41 |INTEGER)|: BOOLEA|
|00000f40| 4e 3b 0d 0d 50 52 4f 43 | 45 44 55 52 45 20 09 54 |N;..PROC|EDURE .T|
|00000f50| 4d 52 65 73 65 74 28 68 | 54 65 72 6d 3a 20 54 65 |MReset(h|Term: Te|
|00000f60| 72 6d 48 61 6e 64 6c 65 | 29 3b 0d 50 52 4f 43 45 |rmHandle|);.PROCE|
|00000f70| 44 55 52 45 20 09 54 4d | 43 6c 65 61 72 28 68 54 |DURE .TM|Clear(hT|
|00000f80| 65 72 6d 3a 20 54 65 72 | 6d 48 61 6e 64 6c 65 29 |erm: Ter|mHandle)|
|00000f90| 3b 0d 0d 50 52 4f 43 45 | 44 55 52 45 20 09 54 4d |;..PROCE|DURE .TM|
|00000fa0| 52 65 73 69 7a 65 28 68 | 54 65 72 6d 3a 20 54 65 |Resize(h|Term: Te|
|00000fb0| 72 6d 48 61 6e 64 6c 65 | 3b 20 6e 65 77 56 69 65 |rmHandle|; newVie|
|00000fc0| 77 52 65 63 74 3a 20 52 | 65 63 74 29 3b 0d 0d 46 |wRect: R|ect);..F|
|00000fd0| 55 4e 43 54 49 4f 4e 20 | 20 09 54 4d 47 65 74 53 |UNCTION | .TMGetS|
|00000fe0| 65 6c 65 63 74 28 68 54 | 65 72 6d 3a 20 54 65 72 |elect(hT|erm: Ter|
|00000ff0| 6d 48 61 6e 64 6c 65 3b | 20 74 68 65 44 61 74 61 |mHandle;| theData|
|00001000| 3a 20 48 61 6e 64 6c 65 | 3b 20 56 41 52 20 74 68 |: Handle|; VAR th|
|00001010| 65 54 79 70 65 3a 20 52 | 65 73 54 79 70 65 29 3a |eType: R|esType):|
|00001020| 20 4c 4f 4e 47 49 4e 54 | 3b 0d 50 52 4f 43 45 44 | LONGINT|;.PROCED|
|00001030| 55 52 45 20 09 54 4d 47 | 65 74 4c 69 6e 65 28 68 |URE .TMG|etLine(h|
|00001040| 54 65 72 6d 3a 20 54 65 | 72 6d 48 61 6e 64 6c 65 |Term: Te|rmHandle|
|00001050| 3b 20 6c 69 6e 65 4e 6f | 3a 20 49 4e 54 45 47 45 |; lineNo|: INTEGE|
|00001060| 52 3b 20 56 41 52 20 74 | 68 65 54 65 72 6d 44 61 |R; VAR t|heTermDa|
|00001070| 74 61 3a 20 54 65 72 6d | 44 61 74 61 42 6c 6f 63 |ta: Term|DataBloc|
|00001080| 6b 29 3b 0d 50 52 4f 43 | 45 44 55 52 45 20 09 54 |k);.PROC|EDURE .T|
|00001090| 4d 53 65 74 53 65 6c 65 | 63 74 69 6f 6e 28 68 54 |MSetSele|ction(hT|
|000010a0| 65 72 6d 3a 20 54 65 72 | 6d 48 61 6e 64 6c 65 3b |erm: Ter|mHandle;|
|000010b0| 20 74 68 65 53 65 6c 65 | 63 74 69 6f 6e 3a 20 54 | theSele|ction: T|
|000010c0| 4d 53 65 6c 65 63 74 69 | 6f 6e 3b 20 73 65 6c 54 |MSelecti|on; selT|
|000010d0| 79 70 65 3a 20 54 4d 53 | 65 6c 54 79 70 65 73 29 |ype: TMS|elTypes)|
|000010e0| 3b 0d 0d 50 52 4f 43 45 | 44 55 52 45 20 09 54 4d |;..PROCE|DURE .TM|
|000010f0| 53 63 72 6f 6c 6c 28 68 | 54 65 72 6d 3a 54 65 72 |Scroll(h|Term:Ter|
|00001100| 6d 48 61 6e 64 6c 65 3b | 20 64 48 2c 20 64 56 3a |mHandle;| dH, dV:|
|00001110| 49 4e 54 45 47 45 52 29 | 3b 0d 0d 46 55 4e 43 54 |INTEGER)|;..FUNCT|
|00001120| 49 4f 4e 20 20 09 54 4d | 56 61 6c 69 64 61 74 65 |ION  .TM|Validate|
|00001130| 28 68 54 65 72 6d 3a 54 | 65 72 6d 48 61 6e 64 6c |(hTerm:T|ermHandl|
|00001140| 65 29 3a 42 4f 4f 4c 45 | 41 4e 3b 0d 50 52 4f 43 |e):BOOLE|AN;.PROC|
|00001150| 45 44 55 52 45 20 09 54 | 4d 44 65 66 61 75 6c 74 |EDURE .T|MDefault|
|00001160| 28 56 41 52 20 74 68 65 | 43 6f 6e 66 69 67 3a 20 |(VAR the|Config: |
|00001170| 50 74 72 3b 20 70 72 6f | 63 49 44 3a 20 49 4e 54 |Ptr; pro|cID: INT|
|00001180| 45 47 45 52 3b 20 61 6c | 6c 6f 63 61 74 65 3a 20 |EGER; al|locate: |
|00001190| 42 4f 4f 4c 45 41 4e 29 | 3b 0d 0d 46 55 4e 43 54 |BOOLEAN)|;..FUNCT|
|000011a0| 49 4f 4e 20 20 09 54 4d | 53 65 74 75 70 50 72 65 |ION  .TM|SetupPre|
|000011b0| 66 6c 69 67 68 74 28 70 | 72 6f 63 49 44 3a 20 49 |flight(p|rocID: I|
|000011c0| 4e 54 45 47 45 52 3b 20 | 56 41 52 20 6d 61 67 69 |NTEGER; |VAR magi|
|000011d0| 63 43 6f 6f 6b 69 65 3a | 20 4c 4f 4e 47 49 4e 54 |cCookie:| LONGINT|
|000011e0| 29 20 3a 20 48 61 6e 64 | 6c 65 3b 0d 50 52 4f 43 |) : Hand|le;.PROC|
|000011f0| 45 44 55 52 45 20 09 54 | 4d 53 65 74 75 70 53 65 |EDURE .T|MSetupSe|
|00001200| 74 75 70 28 70 72 6f 63 | 49 44 3a 20 49 4e 54 45 |tup(proc|ID: INTE|
|00001210| 47 45 52 3b 20 74 68 65 | 43 6f 6e 66 69 67 3a 20 |GER; the|Config: |
|00001220| 50 74 72 3b 20 63 6f 75 | 6e 74 3a 20 49 4e 54 45 |Ptr; cou|nt: INTE|
|00001230| 47 45 52 3b 20 74 68 65 | 44 69 61 6c 6f 67 3a 20 |GER; the|Dialog: |
|00001240| 44 69 61 6c 6f 67 50 74 | 72 3b 0d 09 09 09 09 56 |DialogPt|r;.....V|
|00001250| 41 52 20 6d 61 67 69 63 | 43 6f 6f 6b 69 65 3a 20 |AR magic|Cookie: |
|00001260| 4c 4f 4e 47 49 4e 54 29 | 3b 0d 46 55 4e 43 54 49 |LONGINT)|;.FUNCTI|
|00001270| 4f 4e 20 20 09 54 4d 53 | 65 74 75 70 46 69 6c 74 |ON  .TMS|etupFilt|
|00001280| 65 72 28 70 72 6f 63 49 | 44 3a 20 49 4e 54 45 47 |er(procI|D: INTEG|
|00001290| 45 52 3b 20 74 68 65 43 | 6f 6e 66 69 67 3a 20 50 |ER; theC|onfig: P|
|000012a0| 74 72 3b 20 63 6f 75 6e | 74 3a 20 49 4e 54 45 47 |tr; coun|t: INTEG|
|000012b0| 45 52 3b 20 74 68 65 44 | 69 61 6c 6f 67 3a 20 44 |ER; theD|ialog: D|
|000012c0| 69 61 6c 6f 67 50 74 72 | 3b 20 0d 09 09 09 09 56 |ialogPtr|; .....V|
|000012d0| 41 52 20 74 68 65 45 76 | 65 6e 74 3a 20 45 76 65 |AR theEv|ent: Eve|
|000012e0| 6e 74 52 65 63 6f 72 64 | 3b 20 56 41 52 20 74 68 |ntRecord|; VAR th|
|000012f0| 65 49 74 65 6d 3a 20 49 | 4e 54 45 47 45 52 3b 20 |eItem: I|NTEGER; |
|00001300| 56 41 52 20 6d 61 67 69 | 63 43 6f 6f 6b 69 65 3a |VAR magi|cCookie:|
|00001310| 20 4c 4f 4e 47 49 4e 54 | 29 20 3a 20 42 4f 4f 4c | LONGINT|) : BOOL|
|00001320| 45 41 4e 3b 0d 50 52 4f | 43 45 44 55 52 45 20 09 |EAN;.PRO|CEDURE .|
|00001330| 54 4d 53 65 74 75 70 49 | 74 65 6d 28 70 72 6f 63 |TMSetupI|tem(proc|
|00001340| 49 44 3a 20 49 4e 54 45 | 47 45 52 3b 20 74 68 65 |ID: INTE|GER; the|
|00001350| 43 6f 6e 66 69 67 3a 20 | 50 74 72 3b 20 63 6f 75 |Config: |Ptr; cou|
|00001360| 6e 74 3a 20 49 4e 54 45 | 47 45 52 3b 20 74 68 65 |nt: INTE|GER; the|
|00001370| 44 69 61 6c 6f 67 3a 20 | 44 69 61 6c 6f 67 50 74 |Dialog: |DialogPt|
|00001380| 72 3b 0d 09 09 09 09 56 | 41 52 20 74 68 65 49 74 |r;.....V|AR theIt|
|00001390| 65 6d 3a 20 49 4e 54 45 | 47 45 52 3b 20 56 41 52 |em: INTE|GER; VAR|
|000013a0| 20 6d 61 67 69 63 43 6f | 6f 6b 69 65 3a 20 4c 4f | magicCo|okie: LO|
|000013b0| 4e 47 49 4e 54 29 3b 0d | 50 52 4f 43 45 44 55 52 |NGINT);.|PROCEDUR|
|000013c0| 45 20 09 54 4d 53 65 74 | 75 70 43 6c 65 61 6e 75 |E .TMSet|upCleanu|
|000013d0| 70 28 70 72 6f 63 49 44 | 3a 20 49 4e 54 45 47 45 |p(procID|: INTEGE|
|000013e0| 52 3b 20 74 68 65 43 6f | 6e 66 69 67 3a 20 50 74 |R; theCo|nfig: Pt|
|000013f0| 72 3b 20 63 6f 75 6e 74 | 3a 20 49 4e 54 45 47 45 |r; count|: INTEGE|
|00001400| 52 3b 20 74 68 65 44 69 | 61 6c 6f 67 3a 20 44 69 |R; theDi|alog: Di|
|00001410| 61 6c 6f 67 50 74 72 3b | 0d 09 09 09 09 56 41 52 |alogPtr;|.....VAR|
|00001420| 20 6d 61 67 69 63 43 6f | 6f 6b 69 65 3a 20 4c 4f | magicCo|okie: LO|
|00001430| 4e 47 49 4e 54 29 3b 0d | 50 52 4f 43 45 44 55 52 |NGINT);.|PROCEDUR|
|00001440| 45 20 09 54 4d 53 65 74 | 75 70 50 6f 73 74 66 6c |E .TMSet|upPostfl|
|00001450| 69 67 68 74 28 70 72 6f | 63 49 44 3a 20 49 4e 54 |ight(pro|cID: INT|
|00001460| 45 47 45 52 29 3b 0d 0d | 46 55 4e 43 54 49 4f 4e |EGER);..|FUNCTION|
|00001470| 20 20 09 54 4d 47 65 74 | 43 6f 6e 66 69 67 28 68 |  .TMGet|Config(h|
|00001480| 54 65 72 6d 3a 20 54 65 | 72 6d 48 61 6e 64 6c 65 |Term: Te|rmHandle|
|00001490| 29 3a 20 50 74 72 3b 0d | 46 55 4e 43 54 49 4f 4e |): Ptr;.|FUNCTION|
|000014a0| 20 20 09 54 4d 53 65 74 | 43 6f 6e 66 69 67 28 68 |  .TMSet|Config(h|
|000014b0| 54 65 72 6d 3a 20 54 65 | 72 6d 48 61 6e 64 6c 65 |Term: Te|rmHandle|
|000014c0| 3b 20 74 68 65 50 74 72 | 3a 20 50 74 72 29 3a 20 |; thePtr|: Ptr): |
|000014d0| 49 4e 54 45 47 45 52 3b | 0d 0d 46 55 4e 43 54 49 |INTEGER;|..FUNCTI|
|000014e0| 4f 4e 20 20 09 54 4d 49 | 6e 74 6c 54 6f 45 6e 67 |ON  .TMI|ntlToEng|
|000014f0| 6c 69 73 68 28 68 54 65 | 72 6d 3a 20 54 65 72 6d |lish(hTe|rm: Term|
|00001500| 48 61 6e 64 6c 65 3b 20 | 69 6e 70 75 74 50 74 72 |Handle; |inputPtr|
|00001510| 3a 20 50 74 72 3b 20 56 | 41 52 20 6f 75 74 70 75 |: Ptr; V|AR outpu|
|00001520| 74 50 74 72 3a 20 50 74 | 72 3b 20 0d 09 09 09 09 |tPtr: Pt|r; .....|
|00001530| 6c 61 6e 67 75 61 67 65 | 3a 20 49 4e 54 45 47 45 |language|: INTEGE|
|00001540| 52 29 3a 20 4f 53 45 72 | 72 3b 0d 46 55 4e 43 54 |R): OSEr|r;.FUNCT|
|00001550| 49 4f 4e 20 20 09 54 4d | 45 6e 67 6c 69 73 68 54 |ION  .TM|EnglishT|
|00001560| 6f 49 6e 74 6c 28 68 54 | 65 72 6d 3a 20 54 65 72 |oIntl(hT|erm: Ter|
|00001570| 6d 48 61 6e 64 6c 65 3b | 20 69 6e 70 75 74 50 74 |mHandle;| inputPt|
|00001580| 72 3a 20 50 74 72 3b 20 | 56 41 52 20 6f 75 74 70 |r: Ptr; |VAR outp|
|00001590| 75 74 50 74 72 3a 20 50 | 74 72 3b 0d 09 09 09 09 |utPtr: P|tr;.....|
|000015a0| 6c 61 6e 67 75 61 67 65 | 3a 20 49 4e 54 45 47 45 |language|: INTEGE|
|000015b0| 52 29 3a 20 4f 53 45 72 | 72 3b 0d 09 09 09 09 0d |R): OSEr|r;......|
|000015c0| 50 52 4f 43 45 44 55 52 | 45 20 09 54 4d 47 65 74 |PROCEDUR|E .TMGet|
|000015d0| 54 6f 6f 6c 4e 61 6d 65 | 28 69 64 3a 20 49 4e 54 |ToolName|(id: INT|
|000015e0| 45 47 45 52 3b 20 56 41 | 52 20 6e 61 6d 65 3a 20 |EGER; VA|R name: |
|000015f0| 53 74 72 32 35 35 29 3b | 0d 46 55 4e 43 54 49 4f |Str255);|.FUNCTIO|
|00001600| 4e 20 20 09 54 4d 47 65 | 74 50 72 6f 63 49 44 28 |N  .TMGe|tProcID(|
|00001610| 6e 61 6d 65 3a 20 53 74 | 72 32 35 35 29 20 3a 20 |name: St|r255) : |
|00001620| 49 4e 54 45 47 45 52 3b | 0d 0d 50 52 4f 43 45 44 |INTEGER;|..PROCED|
|00001630| 55 52 45 20 09 54 4d 53 | 65 74 52 65 66 43 6f 6e |URE .TMS|etRefCon|
|00001640| 28 68 54 65 72 6d 3a 20 | 54 65 72 6d 48 61 6e 64 |(hTerm: |TermHand|
|00001650| 6c 65 3b 20 72 65 66 43 | 6f 6e 3a 20 4c 4f 4e 47 |le; refC|on: LONG|
|00001660| 49 4e 54 29 3b 0d 46 55 | 4e 43 54 49 4f 4e 20 09 |INT);.FU|NCTION .|
|00001670| 54 4d 47 65 74 52 65 66 | 43 6f 6e 28 68 54 65 72 |TMGetRef|Con(hTer|
|00001680| 6d 3a 20 54 65 72 6d 48 | 61 6e 64 6c 65 29 20 3a |m: TermH|andle) :|
|00001690| 20 4c 4f 4e 47 49 4e 54 | 3b 0d 0d 50 52 4f 43 45 | LONGINT|;..PROCE|
|000016a0| 44 55 52 45 20 09 54 4d | 53 65 74 55 73 65 72 44 |DURE .TM|SetUserD|
|000016b0| 61 74 61 28 68 54 65 72 | 6d 3a 20 54 65 72 6d 48 |ata(hTer|m: TermH|
|000016c0| 61 6e 64 6c 65 3b 20 75 | 73 65 72 44 61 74 61 3a |andle; u|serData:|
|000016d0| 20 4c 4f 4e 47 49 4e 54 | 29 3b 0d 46 55 4e 43 54 | LONGINT|);.FUNCT|
|000016e0| 49 4f 4e 20 09 54 4d 47 | 65 74 55 73 65 72 44 61 |ION .TMG|etUserDa|
|000016f0| 74 61 28 68 54 65 72 6d | 3a 20 54 65 72 6d 48 61 |ta(hTerm|: TermHa|
|00001700| 6e 64 6c 65 29 20 3a 20 | 4c 4f 4e 47 49 4e 54 3b |ndle) : |LONGINT;|
|00001710| 0d 0d 46 55 4e 43 54 49 | 4f 4e 20 09 54 4d 41 64 |..FUNCTI|ON .TMAd|
|00001720| 64 53 65 61 72 63 68 28 | 68 54 65 72 6d 3a 20 54 |dSearch(|hTerm: T|
|00001730| 65 72 6d 48 61 6e 64 6c | 65 3b 20 74 68 65 53 74 |ermHandl|e; theSt|
|00001740| 72 69 6e 67 3a 20 53 74 | 72 32 35 35 3b 20 77 68 |ring: St|r255; wh|
|00001750| 65 72 65 3a 20 52 65 63 | 74 3b 20 0d 09 09 09 09 |ere: Rec|t; .....|
|00001760| 73 65 61 72 63 68 54 79 | 70 65 3a 20 54 4d 53 65 |searchTy|pe: TMSe|
|00001770| 61 72 63 68 54 79 70 65 | 73 3b 20 63 61 6c 6c 42 |archType|s; callB|
|00001780| 61 63 6b 3a 20 50 72 6f | 63 50 74 72 29 3a 20 49 |ack: Pro|cPtr): I|
|00001790| 4e 54 45 47 45 52 3b 0d | 50 52 4f 43 45 44 55 52 |NTEGER;.|PROCEDUR|
|000017a0| 45 20 09 54 4d 52 65 6d | 6f 76 65 53 65 61 72 63 |E .TMRem|oveSearc|
|000017b0| 68 28 68 54 65 72 6d 3a | 20 54 65 72 6d 48 61 6e |h(hTerm:| TermHan|
|000017c0| 64 6c 65 3b 20 72 65 66 | 6e 75 6d 3a 20 49 4e 54 |dle; ref|num: INT|
|000017d0| 45 47 45 52 29 3b 0d 50 | 52 4f 43 45 44 55 52 45 |EGER);.P|ROCEDURE|
|000017e0| 20 09 54 4d 43 6c 65 61 | 72 53 65 61 72 63 68 28 | .TMClea|rSearch(|
|000017f0| 68 54 65 72 6d 3a 20 54 | 65 72 6d 48 61 6e 64 6c |hTerm: T|ermHandl|
|00001800| 65 29 3b 0d 0d 46 55 4e | 43 54 49 4f 4e 20 20 09 |e);..FUN|CTION  .|
|00001810| 54 4d 47 65 74 43 75 72 | 73 6f 72 28 68 54 65 72 |TMGetCur|sor(hTer|
|00001820| 6d 3a 20 54 65 72 6d 48 | 61 6e 64 6c 65 3b 20 63 |m: TermH|andle; c|
|00001830| 75 72 73 54 79 70 65 3a | 20 54 4d 43 75 72 73 6f |ursType:| TMCurso|
|00001840| 72 54 79 70 65 73 29 20 | 3a 20 50 6f 69 6e 74 3b |rTypes) |: Point;|
|00001850| 0d 0d 46 55 4e 43 54 49 | 4f 4e 20 20 09 54 4d 47 |..FUNCTI|ON  .TMG|
|00001860| 65 74 54 65 72 6d 45 6e | 76 69 72 6f 6e 73 28 68 |etTermEn|virons(h|
|00001870| 54 65 72 6d 3a 20 54 65 | 72 6d 48 61 6e 64 6c 65 |Term: Te|rmHandle|
|00001880| 3b 20 56 41 52 20 74 68 | 65 45 6e 76 69 72 6f 6e |; VAR th|eEnviron|
|00001890| 73 3a 20 54 65 72 6d 45 | 6e 76 69 72 6f 6e 52 65 |s: TermE|nvironRe|
|000018a0| 63 29 3a 20 54 4d 45 72 | 72 3b 0d 0d 46 55 4e 43 |c): TMEr|r;..FUNC|
|000018b0| 54 49 4f 4e 20 09 54 4d | 43 68 6f 6f 73 65 28 56 |TION .TM|Choose(V|
|000018c0| 41 52 20 68 54 65 72 6d | 3a 54 65 72 6d 48 61 6e |AR hTerm|:TermHan|
|000018d0| 64 6c 65 3b 20 77 68 65 | 72 65 3a 20 50 6f 69 6e |dle; whe|re: Poin|
|000018e0| 74 3b 20 69 64 6c 65 50 | 72 6f 63 3a 50 72 6f 63 |t; idleP|roc:Proc|
|000018f0| 50 74 72 29 3a 20 49 4e | 54 45 47 45 52 3b 0d 50 |Ptr): IN|TEGER;.P|
|00001900| 52 4f 43 45 44 55 52 45 | 20 09 54 4d 45 76 65 6e |ROCEDURE| .TMEven|
|00001910| 74 28 68 54 65 72 6d 3a | 20 54 65 72 6d 48 61 6e |t(hTerm:| TermHan|
|00001920| 64 6c 65 3b 20 74 68 65 | 45 76 65 6e 74 3a 20 45 |dle; the|Event: E|
|00001930| 76 65 6e 74 52 65 63 6f | 72 64 29 3b 0d 0d 46 55 |ventReco|rd);..FU|
|00001940| 4e 43 54 49 4f 4e 09 54 | 4d 44 6f 54 65 72 6d 4b |NCTION.T|MDoTermK|
|00001950| 65 79 28 68 54 65 72 6d | 3a 20 54 65 72 6d 48 61 |ey(hTerm|: TermHa|
|00001960| 6e 64 6c 65 3b 20 74 68 | 65 4b 65 79 3a 20 53 74 |ndle; th|eKey: St|
|00001970| 72 32 35 35 29 3a 20 42 | 4f 4f 4c 45 41 4e 3b 0d |r255): B|OOLEAN;.|
|00001980| 46 55 4e 43 54 49 4f 4e | 09 54 4d 43 6f 75 6e 74 |FUNCTION|.TMCount|
|00001990| 54 65 72 6d 4b 65 79 73 | 28 68 54 65 72 6d 3a 20 |TermKeys|(hTerm: |
|000019a0| 54 65 72 6d 48 61 6e 64 | 6c 65 29 3a 20 49 4e 54 |TermHand|le): INT|
|000019b0| 45 47 45 52 3b 0d 50 52 | 4f 43 45 44 55 52 45 09 |EGER;.PR|OCEDURE.|
|000019c0| 54 4d 47 65 74 49 6e 64 | 54 65 72 6d 4b 65 79 28 |TMGetInd|TermKey(|
|000019d0| 68 54 65 72 6d 3a 20 54 | 65 72 6d 48 61 6e 64 6c |hTerm: T|ermHandl|
|000019e0| 65 3b 20 69 64 3a 20 49 | 4e 54 45 47 45 52 3b 20 |e; id: I|NTEGER; |
|000019f0| 56 41 52 20 74 68 65 4b | 65 79 3a 20 53 74 72 32 |VAR theK|ey: Str2|
|00001a00| 35 35 29 3b 0d 0d 7b 24 | 45 4e 44 43 7d 20 7b 55 |55);..{$|ENDC} {U|
|00001a10| 73 69 6e 67 54 4d 49 6e | 74 66 7d 0d 0d 7b 24 49 |singTMIn|tf}..{$I|
|00001a20| 46 43 20 4e 4f 54 20 55 | 73 69 6e 67 49 6e 63 6c |FC NOT U|singIncl|
|00001a30| 75 64 65 73 7d 0d 09 45 | 4e 44 2e 0d 7b 24 45 4e |udes}..E|ND..{$EN|
|00001a40| 44 43 7d 0d 0d 00 00 00 | 00 00 00 00 00 00 00 00 |DC}.....|........|
|00001a50| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001a60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001a70| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001a80| 00 00 01 00 00 00 01 29 | 00 00 00 29 00 00 00 32 |.......)|...)...2|
|00001a90| 6e 64 65 64 53 74 79 6c | 65 2c 20 45 58 54 45 4e |ndedStyl|e, EXTEN|
|00001aa0| 44 45 44 73 74 79 6c 65 | 3b 09 09 2f 2a 20 45 78 |DEDstyle|;../* Ex|
|00001ab0| 08 54 4d 49 6e 74 66 2e | 70 49 02 00 00 00 54 45 |.TMIntf.|pI....TE|
|00001ac0| 58 54 4d 50 53 20 01 00 | 00 40 01 00 00 00 00 00 |XTMPS ..|.@......|
|00001ad0| 00 00 54 45 58 54 4d 50 | 53 20 01 00 00 40 01 00 |..TEXTMP|S ...@..|
|00001ae0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001af0| 00 00 a1 88 fa 80 00 00 | 19 c5 00 00 01 5b 74 79 |........|.....[ty|
|00001b00| 6c 65 09 09 2a 2f 0d 09 | 09 09 09 42 6f 6f 6c 65 |le..*/..|...Boole|
|00001b10| 61 6e 09 09 6e 6f 53 68 | 61 64 6f 77 53 74 79 6c |an..noSh|adowStyl|
|00001b20| 65 2c 20 53 48 41 44 4f | 57 73 74 79 6c 65 3b 09 |e, SHADO|Wstyle;.|
|00001b30| 09 09 2f 2a 20 53 68 61 | 64 6f 77 20 73 74 79 6c |../* Sha|dow styl|
|00001b40| 65 09 09 09 2a 2f 0d 09 | 09 09 09 42 6f 6f 6c 65 |e...*/..|...Boole|
|00001b50| 61 6e 09 09 6e 6f 4f 75 | 74 6c 69 6e 65 53 74 79 |an..noOu|tlineSty|
|00001b60| 6c 65 2c 20 4f 55 54 4c | 49 4e 45 73 74 79 6c 65 |le, OUTL|INEstyle|
|00001b70| 3b 09 09 2f 2a 20 4f 75 | 74 6c 69 6e 65 20 73 74 |;../* Ou|tline st|
|00001b80| 00 00 00 25 01 00 80 00 | 00 00 03 31 2e 30 1a 43 |...%....|...1.0.C|
|00001b90| 6f 6d 6d 75 6e 69 63 61 | 74 69 6f 6e 73 20 54 6f |ommunica|tions To|
|00001ba0| 6f 6c 62 6f 78 20 31 2e | 30 00 00 01 00 00 00 01 |olbox 1.|0.......|
|00001bb0| 29 00 00 00 29 00 00 00 | 32 00 1a 94 08 09 ec 00 |)...)...|2.......|
|00001bc0| 00 00 1c 00 32 00 00 76 | 65 72 73 00 00 00 0a 00 |....2..v|ers.....|
|00001bd0| 02 ff ff 00 00 00 00 00 | 1a 92 1c 00 00 00 00 00 |........|........|
|00001be0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001bf0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+